home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BBS Toolkit
/
BBS Toolkit.iso
/
qbbs
/
acf514r0.zip
/
TOZIP.BAT
< prev
next >
Wrap
DOS Batch File
|
1991-01-27
|
1KB
|
38 lines
@echo off
REM MOVE.BAT - For ACFiles
REM Arguments: %1 - Path to File, %2 - Filename, %3 - Filename Without .EXT
REM Arguments: %4 - Extension of Filename (No ., just EXT)
:
:Check For ARC/LZH/PAK/ZOO/ZIP Files
:IF One of those, goto ZIP
:
if %4 == ARC goto zip
if %4 == LZH goto zip
if %4 == PAK goto zip
if %4 == ZOO goto zip
:if it isn't, write original filename to filename via echo
echo %3.%4 >filename
goto end
:zip
md 1111
cd 1111
if %4 == LZH lharc e %1%3
if %4 == PAK pak e %1%3
if %4 == ZOO zoo e %1%3
if %4 == ARC pkxarc %1%3
if %4 == ZIP pkunzip %1%3
:if not zip file, then convert to .ZIP
if not %4 == ZIP pkzip %1%3 *.*
:make filename Yes to contain input for the delete statement
echo Y >..\yes
:redirect input from previous file
del *.* <..\yes
cd..
rd 1111
:delete file if it was converted (not .ZIP already)
if not %4 == ZIP del %1%2
:put new filename into file called FILENAME to use for new list, etc.
:acfiles reads this in to find out what it should put as the filename for .LSTs
echo %3.ZIP >filename
:end